object LiveFMform: TLiveFMform Left = 271 Top = 237 Width = 682 Height = 363 BorderIcons = [biSystemMenu, biMinimize] Caption = 'Coeli Live Ephem' Font.Color = clWindowText Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop PopupMenu = PopupMenu1 Scaled = False OnClose = FormClose OnCreate = FormCreate OnResize = FormResize OnShow = FormShow PixelsPerInch = 125 TextHeight = 16 object Bevel1: TBevel Left = 0 Top = 305 Width = 674 Height = 2 Align = alBottom end object StringGrid1: TStringGrid Left = 0 Top = 0 Width = 674 Height = 305 Align = alClient ColCount = 13 Ctl3D = True DefaultColWidth = 70 FixedColor = 4210688 RowCount = 12 Font.Color = clRed Font.Height = -14 Font.Name = 'MS Serif' Font.Style = [fsBold] Options = [goVertLine, goHorzLine, goRangeSelect, goRowSizing, goColSizing] ParentCtl3D = False ParentFont = False TabOrder = 0 OnColumnMoved = StringGrid1ColumnMoved OnMouseUp = StringGrid1MouseUp end object StatusBar: TStatusBar Left = 0 Top = 307 Width = 674 Height = 24 Font.Color = clRed Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] Panels = < item Alignment = taCenter Text = 'LCT' Width = 120 end item Alignment = taCenter Text = 'GMT' Width = 120 end item Alignment = taCenter Text = 'Sidereal' Width = 120 end item Alignment = taCenter Text = 'Gregorian Date' Width = 180 end item Alignment = taCenter Text = 'Julian Date' Width = 120 end item Alignment = taCenter Text = 'Location' Width = 130 end> ParentFont = False SimplePanel = False end object Timer1: TTimer Enabled = False Interval = 250 OnTimer = Timer1Timer Top = 1 end object PopupMenu1: TPopupMenu Left = 611 Top = 96 object Clock1: TMenuItem Caption = 'Clock' ShortCut = 0 object Start1: TMenuItem Caption = '&Start' ShortCut = 0 OnClick = Start1Click end object Stop1: TMenuItem Caption = 'Sto&p' ShortCut = 0 OnClick = Stop1Click end end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Font1: TMenuItem Caption = 'Font' ShortCut = 0 OnClick = Font1Click end object Colour1: TMenuItem Caption = 'Colour' ShortCut = 0 object TableColour1: TMenuItem Caption = '&Table' ShortCut = 0 OnClick = TableColour1Click end object WindowColour1: TMenuItem Caption = '&Window' ShortCut = 0 OnClick = WindowColour1Click end end object N2: TMenuItem Caption = '-' ShortCut = 0 end object OnTop1: TMenuItem Caption = 'On Top' Checked = True ShortCut = 0 OnClick = OnTop1Click end object Collapsed1: TMenuItem Caption = 'Collapsed' ShortCut = 0 OnClick = Collapsed1Click end object N3: TMenuItem Caption = '-' ShortCut = 0 end object Print1: TMenuItem Caption = '&Print' ShortCut = 0 OnClick = Print1Click end end object ColorDialog1: TColorDialog Ctl3D = True Left = 611 Top = 126 end object FontDialog1: TFontDialog Font.Color = clWindowText Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 612 Top = 157 end object NameTimer: TTimer OnTimer = NameTimerTimer Top = 33 end object IniOut1: TIniOut FileName = 'STELLA.INI' Items.Strings = ( 'LiveFMform;Height;;Dimensions;LiveFMFormHeight;1;0' 'LiveFMform;Width;;Dimensions;LiveFMFormWidth;1;0' 'LiveFMform;Left;;Position;LiveFMFormLeft;1;0' 'LiveFMform;Top;;Position;LiveFMFormTop;1;0' 'LiveFMform;Color;;Appearance;LiveFMFormColour;1;0' 'StringGrid1;Color;;Appearance;TableColour;1;0' 'StringGrid1;FixedColor;;Appearance;TableFixedColour;1;0' 'LiveFMform;Visible;;Appearance;LiveFMFormVisible;1;0' ';;;;;0;0') RegistryRoot = CURRENT_USER Left = 612 Top = 193 end end